home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / oper_sys / emerald / emrldsys.lha / Language / Compiler / Builtins / RISC.m < prev    next >
Text File  |  1990-08-16  |  408b  |  16 lines
  1. % 
  2. % @(#)RISC.m    1.1  3/16/88
  3. %
  4. export _RISCObject to "Builtins"
  5. const _RISCObject == immutable object _RISCObject
  6.   export getSignature
  7.   const _RISCType == type _RISCType
  8.     function lowerbound -> [Integer]
  9.     function upperbound -> [Integer]
  10.     function getElement [Integer] -> [Character]
  11.   end _RISCType
  12.   function getSignature -> [r : Signature]
  13.     r <- _RISCType
  14.   end getSignature
  15. end _RISCObject
  16.